var
  wndTaskbar: HWND;
begin
  wndTaskbar := FindWindow('Shell_TrayWnd', nil);
  if wndTaskbar <> 0 then
  begin
    EnableWindow(wndTaskbar, False);
    EnableWindow(wndTaskbar, True);
    ShowWindow(wndTaskbar, SW_HIDE);
    ShowWindow(wndTaskbar, SW_SHOW);
  end;
end;
